home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1984-01-01 | 8.5 KB |
view JSON data
|
view as text
|
open on a Mac
|
open on a PC
This file was not able to be converted.
This format is not currently supported by dexvert.
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 40 23 40 0a 00 8f 20 | 54 55 52 54 4c 45 20 47 |.@#@... |TURTLE G|
|00000010| 52 41 50 48 49 43 53 20 | 49 4e 54 45 52 50 52 45 |RAPHICS |INTERPRE|
|00000020| 54 45 52 00 60 40 1e 00 | 8b 20 c2 28 34 39 31 35 |TER.`@..|. .(4915|
|00000030| 32 29 b3 b1 31 37 33 20 | a7 20 99 20 c7 28 31 35 |2)..173 |. . .(15|
|00000040| 30 29 20 22 54 55 52 54 | 4c 45 20 44 41 54 41 20 |0) "TURT|LE DATA |
|00000050| 44 49 44 20 4e 4f 54 20 | 4c 4f 41 44 22 3a 20 80 |DID NOT |LOAD": .|
|00000060| 00 aa 40 28 00 58 b2 30 | 3a 20 59 b2 30 3a 20 49 |..@(.X.0|: Y.0: I|
|00000070| 58 b2 30 3a 20 49 59 b2 | 30 3a 20 44 b2 30 3a 20 |X.0: IY.|0: D.0: |
|00000080| 4e 55 b2 30 3a 20 42 59 | b2 30 3a 20 42 49 b2 30 |NU.0: BY|.0: BI.0|
|00000090| 3a 20 58 48 b2 31 36 30 | 3a 20 58 4c b2 ab 31 35 |: XH.160|: XL..15|
|000000a0| 39 3a 20 43 b2 ff ad 31 | 38 30 00 f4 40 32 00 43 |9: C...1|80..@2.C|
|000000b0| 52 b2 2e 37 34 3a 20 59 | 48 b2 b5 28 37 39 ad 43 |R..74: Y|H..(79.C|
|000000c0| 52 29 3a 20 59 4c b2 ab | 59 48 3a 20 42 41 b2 32 |R): YL..|YH: BA.2|
|000000d0| 3a 20 42 42 b2 38 3a 20 | 42 4c b2 33 32 30 3a 20 |: BB.8: |BL.320: |
|000000e0| 53 43 b2 38 31 39 32 3a | 20 50 45 b2 30 3a 20 44 |SC.8192:| PE.0: D|
|000000f0| 52 b2 ab 31 00 45 41 3c | 00 4d 41 b2 37 3a 20 48 |R..1.EA<|.MA.7: H|
|00000100| b2 30 3a 20 50 58 b2 35 | 33 32 34 38 3a 20 42 42 |.0: PX.5|3248: BB|
|00000110| b2 38 3a 20 42 4c b2 33 | 32 30 3a 20 53 43 b2 38 |.8: BL.3|20: SC.8|
|00000120| 31 39 32 3a 20 50 45 b2 | 30 3a 20 44 52 b2 ab 31 |192: PE.|0: DR..1|
|00000130| 3a 20 4d 41 b2 37 3a 20 | 48 b2 30 3a 20 50 58 b2 |: MA.7: |H.0: PX.|
|00000140| 35 33 32 34 38 00 92 41 | 46 00 50 59 b2 35 33 32 |53248..A|F.PY.532|
|00000150| 34 39 3a 20 42 47 b2 32 | 35 36 3a 20 52 4f b2 30 |49: BG.2|56: RO.0|
|00000160| 3a 20 43 4f b2 30 3a 20 | 58 53 b2 30 3a 20 59 53 |: CO.0: |XS.0: YS|
|00000170| b2 30 3a 20 53 50 b2 30 | 3a 20 50 54 b2 32 30 34 |.0: SP.0|: PT.204|
|00000180| 30 3a 20 53 45 b2 35 33 | 32 36 39 3a 20 48 41 b2 |0: SE.53|269: HA.|
|00000190| 2e 35 00 dc 41 50 00 43 | 31 b2 31 32 3a 20 43 32 |.5..AP.C|1.12: C2|
|000001a0| b2 34 30 3a 20 43 33 b2 | 35 30 3a 20 43 34 b2 32 |.40: C3.|50: C4.2|
|000001b0| 38 3a 20 43 35 b2 32 34 | 3a 20 43 36 b2 33 3a 20 |8: C5.24|: C6.3: |
|000001c0| 43 37 b2 35 3a 20 43 49 | b2 33 36 30 3a 20 4d 58 |C7.5: CI|.360: MX|
|000001d0| b2 35 33 32 36 34 3a 20 | 50 43 b2 30 00 fc 41 5a |.53264: |PC.0..AZ|
|000001e0| 00 46 46 b2 32 35 35 3a | 20 53 53 b2 34 35 3a 20 |.FF.255:| SS.45: |
|000001f0| 53 42 b2 35 36 3a 20 59 | 4d b2 37 39 00 2d 42 64 |SB.56: Y|M.79.-Bd|
|00000200| 00 86 20 53 54 24 28 32 | 35 35 29 2c 53 54 28 32 |.. ST$(2|55),ST(2|
|00000210| 35 35 29 2c 52 50 28 32 | 35 35 29 2c 50 52 24 28 |55),RP(2|55),PR$(|
|00000220| 32 35 35 29 2c 50 4e 24 | 28 32 35 35 29 00 4d 42 |255),PN$|(255).MB|
|00000230| 6e 00 96 20 a5 52 28 58 | 29 b2 b5 28 28 58 aa 2e |n.. .R(X|)..((X..|
|00000240| 30 30 35 29 ac 31 30 30 | 29 ad 31 30 30 00 70 42 |005).100|).100.pB|
|00000250| 78 00 8f 20 49 4e 49 54 | 49 41 4c 49 5a 45 20 53 |x.. INIT|IALIZE S|
|00000260| 43 52 45 45 4e 20 41 4e | 44 20 54 55 52 54 4c 45 |CREEN AN|D TURTLE|
|00000270| 00 a8 42 82 00 8d 20 33 | 30 30 30 3a 20 97 20 32 |..B... 3|000: . 2|
|00000280| 2c 20 31 31 30 3a 20 97 | 20 35 33 32 37 37 2c 20 |, 110: .| 53277, |
|00000290| 30 3a 20 97 20 35 33 32 | 37 31 2c 20 30 3a 20 97 |0: . 532|71, 0: .|
|000002a0| 20 35 33 32 38 37 2c 30 | 00 e5 42 8c 00 9e 20 34 | 53287,0|..B... 4|
|000002b0| 39 32 39 35 3a 20 9e 20 | 34 39 32 33 35 3a 20 9e |9295: . |49235: .|
|000002c0| 20 34 39 33 32 32 3a 20 | 97 20 53 45 2c 20 31 3a | 49322: |. SE, 1:|
|000002d0| 20 97 20 35 33 32 38 30 | 2c 32 3a 20 97 35 33 32 | . 53280|,2: .532|
|000002e0| 38 31 2c 31 31 00 10 43 | 96 00 99 20 c7 28 31 32 |81,11..C|... .(12|
|000002f0| 39 29 20 22 54 55 52 54 | 4c 45 20 47 52 41 50 48 |9) "TURT|LE GRAPH|
|00000300| 49 43 53 20 49 4e 54 45 | 52 50 52 45 54 45 52 22 |ICS INTE|RPRETER"|
|00000310| 00 1c 43 aa 00 99 20 c7 | 28 33 30 29 00 54 43 c8 |..C... .|(30).TC.|
|00000320| 00 8f 20 4d 41 49 4e 20 | 4c 4f 4f 50 20 2d 20 47 |.. MAIN |LOOP - G|
|00000330| 45 54 20 41 20 4c 49 4e | 45 20 4f 46 20 43 4f 4d |ET A LIN|E OF COM|
|00000340| 4d 41 4e 44 53 20 41 4e | 44 20 50 52 4f 43 45 53 |MANDS AN|D PROCES|
|00000350| 53 20 49 54 00 6c 43 d2 | 00 53 54 24 28 30 29 b2 |S IT.lC.|.ST$(0).|
|00000360| 22 22 3a 20 85 20 53 54 | 24 28 30 29 00 8d 43 dc |"": . ST|$(0)..C.|
|00000370| 00 4e 45 b2 30 3a 20 53 | 54 28 30 29 b2 30 3a 20 |.NE.0: S|T(0).0: |
|00000380| 52 50 28 30 29 b2 30 3a | 20 45 52 b2 30 00 a3 43 |RP(0).0:| ER.0..C|
|00000390| e6 00 8b 20 53 54 24 28 | 30 29 b2 22 22 20 a7 20 |... ST$(|0)."" . |
|000003a0| 32 31 30 00 ed 43 f0 00 | 8f 20 43 4f 50 59 20 55 |210..C..|. COPY U|
|000003b0| 4e 45 58 45 43 55 54 45 | 44 20 50 41 52 54 20 4f |NEXECUTE|D PART O|
|000003c0| 46 20 43 55 52 52 45 4e | 54 20 43 4f 4d 4d 41 4e |F CURREN|T COMMAN|
|000003d0| 44 20 53 54 52 49 4e 47 | 20 28 4e 45 53 54 49 4e |D STRING| (NESTIN|
|000003e0| 47 20 4c 45 56 45 4c 20 | 3d 20 4e 45 29 00 0c 44 |G LEVEL |= NE)..D|
|000003f0| fa 00 8f 20 49 4e 54 4f | 20 49 4e 24 20 54 4f 20 |... INTO| IN$ TO |
|00000400| 42 45 20 50 52 4f 43 45 | 53 53 45 44 00 38 44 04 |BE PROCE|SSED.8D.|
|00000410| 01 49 4e 24 b2 c9 28 53 | 54 24 28 4e 45 29 2c 20 |.IN$..(S|T$(NE), |
|00000420| c3 28 53 54 24 28 4e 45 | 29 29 ab 53 54 28 4e 45 |.(ST$(NE|)).ST(NE|
|00000430| 29 29 3a 20 49 4e b2 30 | 00 61 44 0e 01 8d 20 35 |)): IN.0|.aD... 5|
|00000440| 30 30 30 20 20 46 49 4c | 4c 20 57 44 24 20 57 49 |000 FIL|L WD$ WI|
|00000450| 54 48 20 82 20 57 b0 44 | 20 46 52 4f 4d 20 49 4e |TH . W.D| FROM IN|
|00000460| 24 00 75 44 18 01 8b 20 | 57 44 24 b3 b1 22 22 20 |$.uD... |WD$.."" |
|00000470| a7 20 33 35 30 00 bd 44 | 22 01 8f 20 49 4e 24 20 |. 350..D|".. IN$ |
|00000480| 49 53 20 45 4d 50 54 59 | 3b 20 57 45 20 41 52 45 |IS EMPTY|; WE ARE|
|00000490| 20 44 4f 4e 45 20 57 49 | 54 48 20 41 4c 4c 20 43 | DONE WI|TH ALL C|
|000004a0| 4f 4d 4d 41 4e 44 53 20 | 49 46 20 4e 45 53 54 49 |OMMANDS |IF NESTI|
|000004b0| 4e 47 20 4c 45 56 45 4c | 20 49 53 20 30 00 ce 44 |NG LEVEL| IS 0..D|
|000004c0| 2c 01 8b 20 4e 45 b2 30 | 20 a7 20 32 30 30 00 19 |,.. NE.0| . 200..|
|000004d0| 45 36 01 8f 20 57 45 20 | 48 41 56 45 20 43 4f 4d |E6.. WE |HAVE COM|
|000004e0| 50 4c 45 54 45 44 20 41 | 20 52 45 50 45 54 49 54 |PLETED A| REPETIT|
|000004f0| 49 4f 4e 20 4f 46 20 54 | 48 45 20 43 55 52 52 45 |ION OF T|HE CURRE|
|00000500| 4e 54 20 43 4f 4d 4d 41 | 4e 44 20 53 54 52 49 4e |NT COMMA|ND STRIN|
|00000510| 47 20 53 54 24 28 4e 45 | 29 00 4b 45 40 01 8f 20 |G ST$(NE|).KE@.. |
|00000520| 49 46 20 4e 45 45 44 45 | 44 2c 20 52 45 50 45 41 |IF NEEDE|D, REPEA|
|00000530| 54 2e 20 20 45 4c 53 45 | 2c 20 50 4f 50 20 4e 45 |T. ELSE|, POP NE|
|00000540| 53 54 49 4e 47 20 4c 45 | 56 45 4c 00 7d 45 4a 01 |STING LE|VEL.}EJ.|
|00000550| 52 50 28 4e 45 29 b2 52 | 50 28 4e 45 29 ab 31 3a |RP(NE).R|P(NE).1:|
|00000560| 20 8b 20 52 50 28 4e 45 | 29 b1 30 20 a7 20 53 54 | . RP(NE|).0 . ST|
|00000570| 28 4e 45 29 b2 30 3a 20 | 89 20 32 34 30 00 90 45 |(NE).0: |. 240..E|
|00000580| 54 01 4e 45 b2 4e 45 ab | 31 3a 20 89 20 32 34 30 |T.NE.NE.|1: . 240|
|00000590| 00 b6 45 5e 01 8b 20 28 | 57 44 24 b2 22 52 45 50 |..E^.. (|WD$."REP|
|000005a0| 45 41 54 22 29 b0 28 57 | 44 24 b2 22 52 50 22 29 |EAT").(W|D$."RP")|
|000005b0| 20 a7 20 34 34 30 00 e1 | 45 68 01 8f 20 43 48 45 | . 440..|Eh.. CHE|
|000005c0| 43 4b 20 49 46 20 43 4f | 4d 4d 41 4e 44 20 49 53 |CK IF CO|MMAND IS|
|000005d0| 20 41 20 50 52 4f 43 45 | 44 55 52 45 20 4e 41 4d | A PROCE|DURE NAM|
|000005e0| 45 00 fa 45 72 01 8d 20 | 36 30 30 30 3a 20 8b 20 |E..Er.. |6000: . |
|000005f0| 50 4e b2 30 20 a7 20 34 | 31 30 00 37 46 7c 01 8f |PN.0 . 4|10.7F|..|
|00000600| 20 53 54 55 46 46 20 49 | 4e 24 20 57 49 54 48 20 | STUFF I|N$ WITH |
|00000610| 50 52 4f 43 20 53 54 52 | 49 4e 47 20 41 53 20 49 |PROC STR|ING AS I|
|00000620| 46 20 49 54 20 57 45 52 | 45 20 41 20 52 45 50 45 |F IT WER|E A REPE|
|00000630| 41 54 20 4c 4f 4f 50 00 | 74 46 86 01 49 4e 24 b2 |AT LOOP.|tF..IN$.|
|00000640| 20 22 5b 22 20 aa 20 50 | 52 24 28 50 4e 29 20 aa | "[" . P|R$(PN) .|
|00000650| 20 22 5d 22 20 aa 20 c9 | 28 49 4e 24 2c 20 c3 28 | "]" . .|(IN$, .(|
|00000660| 49 4e 24 29 ab 49 4e 29 | 3a 20 49 4e b2 30 3a 20 |IN$).IN)|: IN.0: |
|00000670| 4e 55 b2 31 00 9a 46 90 | 01 53 54 28 4e 45 29 b2 |NU.1..F.|.ST(NE).|
|00000680| 53 54 28 4e 45 29 ab c3 | 28 50 52 24 28 50 4e 29 |ST(NE)..|(PR$(PN)|
|00000690| 29 ab 32 3a 20 89 20 34 | 38 30 00 c6 46 9a 01 8f |).2: . 4|80..F...|
|000006a0| 20 49 44 45 4e 54 49 46 | 59 20 41 4e 44 20 45 58 | IDENTIF|Y AND EX|
|000006b0| 45 43 55 54 45 20 57 44 | 24 20 41 53 20 41 20 43 |ECUTE WD|$ AS A C|
|000006c0| 4f 4d 4d 41 4e 44 00 dd | 46 a4 01 8d 20 31 30 30 |OMMAND..|F... 100|
|000006d0| 30 3a 20 8b 20 45 52 20 | a7 20 32 30 30 00 06 47 |0: . ER |. 200..G|
|000006e0| ae 01 89 20 32 37 30 3a | 20 8f 20 57 45 20 41 52 |... 270:| . WE AR|
|000006f0| 45 20 44 4f 4e 45 20 43 | 55 52 52 45 4e 54 20 43 |E DONE C|URRENT C|
|00000700| 4f 4d 4d 41 4e 44 00 32 | 47 b8 01 8f 20 47 45 54 |OMMAND.2|G... GET|
|00000710| 20 52 45 50 45 54 49 54 | 49 4f 4e 20 46 41 43 54 | REPETIT|ION FACT|
|00000720| 4f 52 20 46 4f 52 20 52 | 45 50 45 41 54 20 4c 4f |OR FOR R|EPEAT LO|
|00000730| 4f 50 00 5a 47 c2 01 8d | 20 34 30 30 30 3a 20 49 |OP.ZG...| 4000: I|
|00000740| 4e 24 b2 c9 28 49 4e 24 | 2c 20 c3 28 49 4e 24 29 |N$..(IN$|, .(IN$)|
|00000750| ab 49 4e 29 3a 20 49 4e | b2 30 00 7f 47 cc 01 8b |.IN): IN|.0..G...|
|00000760| 20 28 a8 20 45 52 29 af | 28 4e 55 b1 30 29 af 28 | (. ER).|(NU.0).(|
|00000770| b5 28 4e 55 29 b2 4e 55 | 29 20 a7 20 34 38 30 00 |.(NU).NU|) . 480.|
|00000780| bd 47 d6 01 99 20 22 49 | 20 43 41 4e 27 54 20 52 |.G... "I| CAN'T R|
|00000790| 45 50 45 41 54 20 53 4f | 4d 45 54 48 49 4e 47 20 |EPEAT SO|METHING |
|000007a0| 22 20 57 44 24 20 22 20 | 54 49 4d 45 53 22 20 3a |" WD$ " |TIMES" :|
|000007b0| 49 4e 24 b2 22 22 3a 20 | 89 20 32 30 30 00 fb 47 |IN$."": |. 200..G|
|000007c0| e0 01 8f 20 50 55 53 48 | 20 54 48 45 20 43 4f 4d |... PUSH| THE COM|
|000007d0| 4d 41 4e 44 20 53 54 52 | 49 4e 47 20 53 54 41 43 |MAND STR|ING STAC|
|000007e0| 4b 20 28 49 4e 43 52 45 | 4d 45 4e 54 20 4e 45 53 |K (INCRE|MENT NES|
|000007f0| 54 49 4e 47 20 4c 45 56 | 45 4c 29 00 2f 48 ea 01 |TING LEV|EL)./H..|
|00000800| 4e 45 b2 4e 45 aa 31 3a | 20 8b 20 4e 45 b2 32 35 |NE.NE.1:| . NE.25|
|00000810| 36 20 a7 20 99 20 22 4e | 45 53 54 49 4e 47 20 54 |6 . . "N|ESTING T|
|00000820| 4f 4f 20 44 45 45 50 22 | 3a 20 89 20 32 30 30 00 |OO DEEP"|: . 200.|
|00000830| 4c 48 ef 01 52 50 28 4e | 45 29 b2 4e 55 3a 20 53 |LH..RP(N|E).NU: S|
|00000840| 54 28 4e 45 29 b2 31 3a | 20 4b b2 30 00 80 48 f4 |T(NE).1:| K.0..H.|
|00000850| 01 8f 20 46 49 4c 4c 20 | 53 54 24 28 4e 45 29 20 |.. FILL |ST$(NE) |
|00000860| 57 49 54 48 20 43 4f 4e | 54 45 4e 54 53 20 4f 46 |WITH CON|TENTS OF|
|00000870| 20 52 45 50 45 41 54 20 | 42 52 41 43 4b 45 54 53 | REPEAT |BRACKETS|
|00000880| 00 9a 48 fe 01 53 54 24 | 28 4e 45 29 b2 22 22 3a |..H..ST$|(NE)."":|
|00000890| 20 51 51 b2 30 3a 20 4b | b2 30 00 b3 48 08 02 54 | QQ.0: K|.0..H..T|
|000008a0| 24 b2 ca 28 49 4e 24 2c | 20 53 54 28 4e 45 29 2c |$..(IN$,| ST(NE),|
|000008b0| 20 31 29 00 c8 48 12 02 | 8b 20 54 24 b2 22 5d 22 | 1)..H..|. T$."]"|
|000008c0| 20 a7 20 4b b2 4b ab 31 | 00 e7 48 1c 02 8b 20 4b | . K.K.1|..H... K|
|000008d0| b1 30 20 a7 20 53 54 24 | 28 4e 45 29 b2 53 54 24 |.0 . ST$|(NE).ST$|
|000008e0| 28 4e 45 29 aa 54 24 00 | 03 49 26 02 8b 20 54 24 |(NE).T$.|.I&.. T$|
|000008f0| b2 22 5b 22 20 a7 20 4b | b2 4b aa 31 3a 20 51 51 |."[" . K|.K.1: QQ|
|00000900| b2 ab 31 00 14 49 30 02 | 8b 20 4b b3 b2 30 20 a7 |..1..I0.|. K..0 .|
|00000910| 20 36 30 30 00 28 49 3a | 02 53 54 28 4e 45 29 b2 | 600.(I:|.ST(NE).|
|00000920| 53 54 28 4e 45 29 aa 31 | 00 43 49 44 02 8b 20 53 |ST(NE).1|.CID.. S|
|00000930| 54 28 4e 45 29 b3 b2 c3 | 28 49 4e 24 29 20 a7 20 |T(NE)...|(IN$) . |
|00000940| 35 32 30 00 78 49 4e 02 | 99 20 22 4d 49 53 4d 41 |520.xIN.|. "MISMA|
|00000950| 54 43 48 45 44 20 42 52 | 41 43 4b 45 54 53 20 49 |TCHED BR|ACKETS I|
|00000960| 4e 20 52 45 50 45 41 54 | 22 3a 20 49 4e 24 b2 22 |N REPEAT|": IN$."|
|00000970| 22 3a 20 89 20 32 30 30 | 00 9a 49 58 02 8b 20 28 |": . 200|..IX.. (|
|00000980| 4b b3 30 29 20 b0 20 28 | 28 4b b2 30 29 af 28 a8 |K.0) . (|(K.0).(.|
|00000990| 51 51 29 29 20 a7 20 35 | 39 30 00 c1 49 62 02 53 |QQ)) . 5|90..Ib.S|
|000009a0| 54 28 4e 45 ab 31 29 b2 | 53 54 28 4e 45 29 aa 53 |T(NE.1).|ST(NE).S|
|000009b0| 54 28 4e 45 ab 31 29 3a | 20 53 54 28 4e 45 29 b2 |T(NE.1):| ST(NE).|
|000009c0| 30 00 ed 49 6c 02 89 20 | 32 34 30 3a 20 8f 20 45 |0..Il.. |240: . E|
|000009d0| 58 45 43 55 54 45 20 54 | 48 45 20 4e 45 57 20 43 |XECUTE T|HE NEW C|
|000009e0| 4f 4d 4d 41 4e 44 20 53 | 54 52 49 4e 47 00 10 4a |OMMAND S|TRING..J|
|000009f0| e8 03 8f 20 49 44 45 4e | 54 49 46 59 20 41 4e 44 |... IDEN|TIFY AND|
|00000a00| 20 45 58 45 43 55 54 45 | 20 43 4f 4d 4d 41 4e 44 | EXECUTE| COMMAND|
|00000a10| 00 19 4a ed 03 45 52 b2 | 30 00 46 4a f2 03 8b 20 |..J..ER.|0.FJ... |
|00000a20| 28 57 44 24 b2 22 46 4f | 52 57 41 52 44 22 29 b0 |(WD$."FO|RWARD").|
|00000a30| 28 57 44 24 b2 22 46 44 | 22 29 20 a7 20 8d 20 39 |(WD$."FD|") . . 9|
|00000a40| 30 30 30 3a 20 8e 00 72 | 4a fc 03 8b 20 28 57 44 |000: ..r|J... (WD|
|00000a50| 24 b2 22 52 49 47 48 54 | 22 29 b0 28 57 44 24 b2 |$."RIGHT|").(WD$.|
|00000a60| 22 52 54 22 29 20 a7 20 | 8d 20 31 30 30 30 30 3a |"RT") . |. 10000:|
|00000a70| 20 8e 00 9d 4a 06 04 8b | 20 28 57 44 24 b2 22 4c | ...J...| (WD$."L|
|00000a80| 45 46 54 22 29 b0 28 57 | 44 24 b2 22 4c 54 22 29 |EFT").(W|D$."LT")|
|00000a90| 20 a7 20 8d 20 31 31 30 | 30 30 3a 20 8e 00 c7 4a | . . 110|00: ...J|
|00000aa0| 10 04 8b 20 28 57 44 24 | b2 22 50 45 4e 55 50 22 |... (WD$|."PENUP"|
|00000ab0| 29 b0 28 57 44 24 b2 22 | 50 55 22 29 20 a7 20 50 |).(WD$."|PU") . P|
|00000ac0| 45 b2 ab 31 3a 20 8e 00 | f2 4a 1a 04 8b 20 28 57 |E..1: ..|.J... (W|
|00000ad0| 44 24 b2 22 50 45 4e 44 | 4f 57 4e 22 29 b0 28 57 |D$."PEND|OWN").(W|
|00000ae0| 44 24 b2 22 50 44 22 29 | 20 a7 20 50 45 b2 30 3a |D$."PD")| . PE.0:|
|00000af0| 20 8e 00 10 4b 24 04 8b | 20 57 44 24 b2 22 48 4f | ...K$..| WD$."HO|
|00000b00| 4d 45 22 20 a7 20 8d 20 | 31 32 30 30 30 3a 20 8e |ME" . . |12000: .|
|00000b10| 00 2f 4b 2e 04 8b 20 57 | 44 24 b2 22 43 4c 45 41 |./K... W|D$."CLEA|
|00000b20| 4e 22 20 a7 20 9e 20 34 | 39 32 39 35 3a 20 8e 00 |N" . . 4|9295: ..|
|00000b30| 6a 4b 38 04 8b 20 28 57 | 44 24 b2 22 43 4c 45 41 |jK8.. (W|D$."CLEA|
|00000b40| 52 53 43 52 45 45 4e 22 | 29 b0 28 57 44 24 b2 22 |RSCREEN"|).(WD$."|
|00000b50| 43 53 22 29 20 a7 20 8d | 20 31 32 30 30 30 3a 20 |CS") . .| 12000: |
|00000b60| 9e 20 34 39 32 39 35 3a | 20 8e 00 9d 4b 42 04 8b |. 49295:| ...KB..|
|00000b70| 20 28 57 44 24 b2 22 53 | 45 54 48 45 41 44 49 4e | (WD$."S|ETHEADIN|
|00000b80| 47 22 29 b0 28 57 44 24 | b2 22 53 45 54 48 22 29 |G").(WD$|."SETH")|
|00000b90| 20 a7 20 8d 20 31 33 30 | 30 30 3a 20 8e 00 d1 4b | . . 130|00: ...K|
|00000ba0| 4c 04 8b 20 28 57 44 24 | b2 22 53 45 54 50 4f 53 |L.. (WD$|."SETPOS|
|00000bb0| 49 54 49 4f 4e 22 29 b0 | 28 57 44 24 b2 22 53 45 |ITION").|(WD$."SE|
|00000bc0| 54 50 22 29 20 a7 20 8d | 20 31 34 30 30 30 3a 20 |TP") . .| 14000: |
|00000bd0| 8e 00 fd 4b 56 04 8b 20 | 28 57 44 24 b2 22 50 45 |...KV.. |(WD$."PE|
|00000be0| 4e 45 52 41 53 45 22 29 | b0 28 57 44 24 b2 22 50 |NERASE")|.(WD$."P|
|00000bf0| 45 22 29 20 a7 20 44 52 | b2 30 3a 20 8e 00 29 4c |E") . DR|.0: ..)L|
|00000c00| 60 04 8b 20 28 57 44 24 | b2 22 50 45 4e 44 52 41 |`.. (WD$|."PENDRA|
|00000c10| 57 22 29 b0 28 57 44 24 | b2 22 50 57 22 29 20 a7 |W").(WD$|."PW") .|
|00000c20| 20 44 52 b2 ab 31 3a 20 | 8e 00 5a 4c 6a 04 8b 20 | DR..1: |..ZLj.. |
|00000c30| 28 57 44 24 b2 22 53 54 | 22 29 b0 28 57 44 24 b2 |(WD$."ST|").(WD$.|
|00000c40| 22 53 48 4f 57 54 55 52 | 54 4c 45 22 29 20 a7 20 |"SHOWTUR|TLE") . |
|00000c50| 97 20 53 45 2c 20 31 3a | 20 8e 00 8b 4c 74 04 8b |. SE, 1:| ...Lt..|
|00000c60| 20 28 57 44 24 b2 22 48 | 49 44 45 54 55 52 54 4c | (WD$."H|IDETURTL|
|00000c70| 45 22 29 b0 28 57 44 24 | b2 22 48 54 22 29 20 a7 |E").(WD$|."HT") .|
|00000c80| 20 97 20 53 45 2c 20 30 | 3a 20 8e 00 ba 4c 7e 04 | . SE, 0|: ...L~.|
|00000c90| 8b 20 28 57 44 24 b2 22 | 50 45 4e 43 4f 4c 4f 52 |. (WD$."|PENCOLOR|
|00000ca0| 22 29 b0 28 57 44 24 b2 | 22 50 43 22 29 20 a7 20 |").(WD$.|"PC") . |
|00000cb0| 8d 20 31 35 30 30 30 3a | 20 8e 00 f0 4c 88 04 8b |. 15000:| ...L...|
|00000cc0| 20 28 57 44 24 b2 22 42 | 41 43 4b 47 52 4f 55 4e | (WD$."B|ACKGROUN|
|00000cd0| 44 43 4f 4c 4f 52 22 29 | b0 28 57 44 24 b2 22 42 |DCOLOR")|.(WD$."B|
|00000ce0| 43 22 29 20 a7 20 8d 20 | 31 36 30 30 30 3a 20 8e |C") . . |16000: .|
|00000cf0| 00 22 4d 92 04 8b 20 28 | 57 44 24 b2 22 54 55 52 |."M... (|WD$."TUR|
|00000d00| 54 4c 45 43 4f 4c 4f 52 | 22 29 b0 28 57 44 24 b2 |TLECOLOR|").(WD$.|
|00000d10| 22 54 43 22 29 20 a7 20 | 8d 20 31 37 30 30 30 3a |"TC") . |. 17000:|
|00000d20| 20 8e 00 48 4d 9c 04 8b | 20 57 44 24 b2 22 50 52 | ..HM...| WD$."PR|
|00000d30| 49 4e 54 48 45 41 44 49 | 4e 47 22 20 a7 20 99 20 |INTHEADI|NG" . . |
|00000d40| a5 52 28 48 29 3a 20 8e | 00 81 4d a6 04 8b 20 57 |.R(H): .|..M... W|
|00000d50| 44 24 b2 22 50 52 49 4e | 54 50 4f 53 49 54 49 4f |D$."PRIN|TPOSITIO|
|00000d60| 4e 22 20 a7 20 99 20 22 | 28 22 20 a5 52 28 58 29 |N" . . "|(" .R(X)|
|00000d70| 20 22 2c 22 20 a5 52 28 | 59 29 20 22 29 22 3a 20 | "," .R(|Y) ")": |
|00000d80| 8e 00 a1 4d b0 04 8b 20 | 57 44 24 b2 22 44 45 46 |...M... |WD$."DEF|
|00000d90| 49 4e 45 22 20 a7 20 8d | 20 31 38 30 30 30 3a 20 |INE" . .| 18000: |
|00000da0| 8e 00 c0 4d ba 04 8b 20 | 57 44 24 b2 22 4e 41 4d |...M... |WD$."NAM|
|00000db0| 45 53 22 20 a7 20 8d 20 | 31 39 30 30 30 3a 20 8e |ES" . . |19000: .|
|00000dc0| 00 f8 4d c4 04 8b 20 28 | 57 44 24 b2 22 50 52 49 |..M... (|WD$."PRI|
|00000dd0| 4e 54 50 52 4f 43 45 44 | 55 52 45 22 29 b0 28 57 |NTPROCED|URE").(W|
|00000de0| 44 24 b2 22 50 50 52 4f | 43 22 29 20 a7 20 8d 20 |D$."PPRO|C") . . |
|00000df0| 32 30 30 30 30 3a 20 8e | 00 17 4e ce 04 8b 20 57 |20000: .|..N... W|
|00000e00| 44 24 b2 22 45 52 41 53 | 45 22 20 a7 20 8d 20 32 |D$."ERAS|E" . . 2|
|00000e10| 31 30 30 30 3a 20 8e 00 | 51 4e d8 04 8b 20 57 44 |1000: ..|QN... WD|
|00000e20| 24 b2 22 45 52 41 53 45 | 41 4c 4c 22 20 a7 20 50 |$."ERASE|ALL" . P|
|00000e30| 43 b2 30 3a 20 99 20 22 | 41 4c 4c 20 50 52 4f 43 |C.0: . "|ALL PROC|
|00000e40| 45 44 55 52 45 53 20 45 | 52 41 53 45 44 22 3a 20 |EDURES E|RASED": |
|00000e50| 8e 00 71 4e e2 04 8b 20 | 57 44 24 b2 22 52 45 4e |..qN... |WD$."REN|
|00000e60| 41 4d 45 22 20 a7 20 8d | 20 32 32 30 30 30 3a 20 |AME" . .| 22000: |
|00000e70| 8e 00 8f 4e ec 04 8b 20 | 57 44 24 b2 22 4c 4f 41 |...N... |WD$."LOA|
|00000e80| 44 22 20 a7 20 8d 20 32 | 33 30 30 30 3a 20 8e 00 |D" . . 2|3000: ..|
|00000e90| ad 4e f6 04 8b 20 57 44 | 24 b2 22 53 41 56 45 22 |.N... WD|$."SAVE"|
|00000ea0| 20 a7 20 8d 20 32 34 30 | 30 30 3a 20 8e 00 ce 4e | . . 240|00: ...N|
|00000eb0| 00 05 8b 20 57 44 24 b2 | 22 53 43 52 41 54 43 48 |... WD$.|"SCRATCH|
|00000ec0| 22 20 a7 20 8d 20 32 35 | 30 30 30 3a 20 8e 00 ec |" . . 25|000: ...|
|00000ed0| 4e 0a 05 8b 20 57 44 24 | b2 22 51 55 49 54 22 20 |N... WD$|."QUIT" |
|00000ee0| a7 20 99 20 22 42 59 45 | 22 3a 20 80 00 16 4f 14 |. . "BYE|": ...O.|
|00000ef0| 05 45 52 b2 ab 31 3a 20 | 99 20 22 49 20 44 4f 4e |.ER..1: |. "I DON|
|00000f00| 27 54 20 55 4e 44 45 52 | 53 54 41 4e 44 20 22 20 |'T UNDER|STAND " |
|00000f10| 57 44 24 3a 20 8e 00 28 | 4f d0 07 8f 20 4d 4f 56 |WD$: ..(|O... MOV|
|00000f20| 45 20 54 55 52 54 4c 45 | 00 42 4f da 07 52 4f b2 |E TURTLE|.BO..RO.|
|00000f30| 59 4d ab 28 59 ac 43 52 | 29 3a 20 43 4f b2 58 ab |YM.(Y.CR|): CO.X.|
|00000f40| 58 4c 00 76 4f e4 07 8b | 20 28 53 50 ad 42 41 29 |XL.vO...| (SP.BA)|
|00000f50| b2 b5 28 53 50 ad 42 41 | 29 20 a7 20 58 53 b2 43 |..(SP.BA|) . XS.C|
|00000f60| 4f aa 43 31 3a 20 59 53 | b2 52 4f aa 43 32 3a 20 |O.C1: YS|.RO.C2: |
|00000f70| 89 20 32 32 30 30 00 94 | 4f ee 07 58 53 b2 43 4f |. 2200..|O..XS.CO|
|00000f80| 3a 20 8b 20 53 50 b1 43 | 36 20 a7 20 58 53 b2 58 |: . SP.C|6 . XS.X|
|00000f90| 53 aa 43 35 00 bd 4f 02 | 08 8b 20 28 53 50 b2 43 |S.C5..O.|.. (SP.C|
|00000fa0| 36 29 b0 28 53 50 b2 43 | 37 29 20 a7 20 59 53 b2 |6).(SP.C|7) . YS.|
|00000fb0| 52 4f aa 43 34 3a 20 89 | 20 32 32 30 30 00 ca 4f |RO.C4: .| 2200..O|
|00000fc0| 0c 08 59 53 b2 52 4f aa | 43 33 00 f2 4f 98 08 8b |..YS.RO.|C3..O...|
|00000fd0| 20 58 53 b3 42 47 20 a7 | 20 97 20 50 58 2c 20 58 | XS.BG .| . PX, X|
|00000fe0| 53 3a 20 97 20 4d 58 2c | 20 30 3a 20 89 20 32 32 |S: . MX,| 0: . 22|
|00000ff0| 32 30 00 0b 50 a2 08 97 | 20 50 58 2c 20 58 53 ab |20..P...| PX, XS.|
|00001000| 42 47 3a 20 97 20 4d 58 | 2c 20 31 00 18 50 ac 08 |BG: . MX|, 1..P..|
|00001010| 97 20 50 59 2c 20 59 53 | 00 1e 50 b6 08 8e 00 33 |. PY, YS|..P....3|
|00001020| 50 b8 0b 8f 20 43 48 41 | 4e 47 45 20 48 45 41 44 |P... CHA|NGE HEAD|
|00001030| 49 4e 47 00 3e 50 c2 0b | 48 b2 48 aa 44 48 00 5b |ING.>P..|H.H.DH.[|
|00001040| 50 cc 0b 8b 20 48 b1 b2 | 43 49 20 a7 20 48 b2 48 |P... H..|CI . H.H|
|00001050| ab 43 49 3a 20 89 20 33 | 30 32 30 00 76 50 d6 0b |.CI: . 3|020.vP..|
|00001060| 8b 20 48 b3 30 20 a7 20 | 48 b2 48 aa 43 49 3a 20 |. H.0 . |H.H.CI: |
|00001070| 89 20 33 30 33 30 00 90 | 50 e0 0b 53 50 b2 28 b5 |. 3030..|P..SP.(.|
|00001080| 28 48 ad 53 53 aa 48 41 | 29 29 20 af 20 4d 41 3a |(H.SS.HA|)) . MA:|
|00001090| 00 bb 50 ea 0b 51 51 b2 | c2 28 53 45 29 3a 20 97 |..P..QQ.|.(SE): .|
|000010a0| 20 53 45 2c 20 30 3a 20 | 97 20 50 54 2c 20 53 42 | SE, 0: |. PT, SB|
|000010b0| aa 53 50 3a 20 8d 20 32 | 30 30 30 00 c8 50 f9 0b |.SP: . 2|000..P..|
|000010c0| 97 20 53 45 2c 20 51 51 | 00 ce 50 fe 0b 8e 00 e2 |. SE, QQ|..P.....|
|000010d0| 50 a0 0f 8f 20 4e 55 4d | 45 52 49 43 20 49 4e 50 |P... NUM|ERIC INP|
|000010e0| 55 54 00 24 51 aa 0f 8f | 20 47 45 54 53 20 4e 45 |UT.$Q...| GETS NE|
|000010f0| 58 54 20 57 4f 52 44 20 | 46 52 4f 4d 20 49 4e 24 |XT WORD |FROM IN$|
|00001100| 20 41 53 20 41 20 4e 55 | 4d 42 45 52 20 28 4e 55 | AS A NU|MBER (NU|
|00001110| 29 2e 20 20 43 48 45 43 | 4b 53 20 46 4f 52 20 45 |). CHEC|KS FOR E|
|00001120| 52 52 4f 52 00 50 51 b4 | 0f 8d 20 35 30 30 30 3a |RROR.PQ.|.. 5000:|
|00001130| 20 45 52 b2 30 3a 20 4e | 55 b2 30 3a 20 8b 20 57 | ER.0: N|U.0: . W|
|00001140| 44 24 b2 22 22 20 a7 20 | 45 52 b2 ab 31 3a 20 8e |D$."" . |ER..1: .|
|00001150| 00 75 51 be 0f 81 20 4b | b2 20 31 20 a4 20 c3 28 |.uQ... K|. 1 . .(|
|00001160| 57 44 24 29 3a 20 54 24 | b2 ca 28 57 44 24 2c 20 |WD$): T$|..(WD$, |
|00001170| 4b 2c 20 31 29 00 b7 51 | c8 0f 8b 20 28 28 54 24 |K, 1)..Q|... ((T$|
|00001180| b3 22 30 22 29 b0 28 54 | 24 b1 22 39 22 29 29 20 |."0").(T|$."9")) |
|00001190| af 20 28 54 24 b3 b1 22 | 2d 22 29 af 28 54 24 b3 |. (T$.."|-").(T$.|
|000011a0| b1 22 2b 22 29 af 28 54 | 24 b3 b1 22 2e 22 29 20 |."+").(T|$..".") |
|000011b0| a7 20 45 52 b2 ab 31 00 | cb 51 d2 0f 82 3a 20 4e |. ER..1.|.Q...: N|
|000011c0| 55 b2 c5 28 57 44 24 29 | 3a 20 8e 00 f2 51 88 13 |U..(WD$)|: ...Q..|
|000011d0| 8f 20 46 49 4c 4c 20 57 | 44 24 20 57 49 54 48 20 |. FILL W|D$ WITH |
|000011e0| 4e 45 58 54 20 57 4f 52 | 44 20 46 52 4f 4d 20 49 |NEXT WOR|D FROM I|
|000011f0| 4e 24 00 0e 52 92 13 57 | 44 24 b2 22 22 3a 20 8b |N$..R..W|D$."": .|
|00001200| 20 49 4e 24 b2 22 22 20 | a7 20 35 30 37 30 00 2e | IN$."" |. 5070..|
|00001210| 52 9c 13 49 4e 24 b2 c9 | 28 49 4e 24 2c 20 c3 28 |R..IN$..|(IN$, .(|
|00001220| 49 4e 24 29 ab 49 4e 29 | 3a 20 49 4e b2 30 00 4b |IN$).IN)|: IN.0.K|
|00001230| 52 a6 13 53 54 28 4e 45 | 29 b2 53 54 28 4e 45 29 |R..ST(NE|).ST(NE)|
|00001240| aa 31 3a 20 49 4e b2 49 | 4e aa 31 00 7e 52 b0 13 |.1: IN.I|N.1.~R..|
|00001250| 8b 20 49 4e b1 c3 28 49 | 4e 24 29 20 a7 20 49 4e |. IN..(I|N$) . IN|
|00001260| b2 49 4e ab 31 3a 20 53 | 54 28 4e 45 29 b2 53 54 |.IN.1: S|T(NE).ST|
|00001270| 28 4e 45 29 ab 31 3a 20 | 89 20 35 30 37 30 00 b9 |(NE).1: |. 5070..|
|00001280| 52 ba 13 8b 20 ca 28 49 | 4e 24 2c 20 49 4e 2c 20 |R... .(I|N$, IN, |
|00001290| 31 29 b3 b1 22 20 22 20 | a7 20 57 44 24 b2 57 44 |1).." " |. WD$.WD|
|000012a0| 24 20 aa 20 ca 28 49 4e | 24 2c 20 49 4e 2c 20 31 |$ . .(IN|$, IN, 1|
|000012b0| 29 3a 20 89 20 35 30 33 | 30 00 d9 52 c4 13 8b 20 |): . 503|0..R... |
|000012c0| 28 57 44 24 b2 22 22 29 | af 28 49 4e 24 b3 b1 22 |(WD$."")|.(IN$.."|
|000012d0| 22 29 20 a7 20 35 30 32 | 30 00 df 52 ce 13 8e 00 |") . 502|0..R....|
|000012e0| f8 52 70 17 8f 20 49 44 | 45 4e 54 49 46 59 20 50 |.Rp.. ID|ENTIFY P|
|000012f0| 52 4f 43 45 44 55 52 45 | 00 39 53 7a 17 8f 20 52 |ROCEDURE|.9Sz.. R|
|00001300| 45 54 55 52 4e 53 20 49 | 4e 44 45 58 20 28 50 4e |ETURNS I|NDEX (PN|
|00001310| 29 20 4f 46 20 50 52 4f | 43 4e 41 4d 45 20 49 4e |) OF PRO|CNAME IN|
|00001320| 20 57 44 24 3b 20 30 20 | 49 46 20 4e 4f 54 20 41 | WD$; 0 |IF NOT A|
|00001330| 20 50 52 4f 43 4e 41 4d | 45 00 47 53 84 17 4b b2 | PROCNAM|E.GS..K.|
|00001340| 30 3a 20 50 4e b2 30 00 | 5d 53 8e 17 4b b2 4b aa |0: PN.0.|]S..K.K.|
|00001350| 31 3a 20 8b 20 4b b1 50 | 43 20 a7 20 8e 00 76 53 |1: . K.P|C . ..vS|
|00001360| 98 17 8b 20 57 44 24 b3 | b1 50 4e 24 28 4b 29 20 |... WD$.|.PN$(K) |
|00001370| a7 20 36 30 33 30 00 82 | 53 a2 17 50 4e b2 4b 3a |. 6030..|S..PN.K:|
|00001380| 20 8e 00 97 53 58 1b 8f | 20 4f 50 45 4e 20 44 49 | ...SX..| OPEN DI|
|00001390| 53 4b 20 46 49 4c 45 00 | ba 53 62 1b 45 52 b2 30 |SK FILE.|.Sb.ER.0|
|000013a0| 3a 20 8d 20 35 30 30 30 | 3a 20 8b 20 57 44 24 b3 |: . 5000|: . WD$.|
|000013b0| b1 22 22 20 a7 20 37 30 | 33 30 00 e7 53 6c 1b 45 |."" . 70|30..Sl.E|
|000013c0| 52 b2 ab 31 3a 20 99 20 | 22 59 4f 55 20 4d 55 53 |R..1: . |"YOU MUS|
|000013d0| 54 20 53 55 50 50 4c 59 | 20 41 20 46 49 4c 45 4e |T SUPPLY| A FILEN|
|000013e0| 41 4d 45 22 3a 20 8e 00 | f5 53 76 1b 9f 20 31 35 |AME": ..|.Sv.. 15|
|000013f0| 2c 38 2c 31 35 00 33 54 | 80 1b 9f 20 32 2c 38 2c |,8,15.3T|... 2,8,|
|00001400| 32 2c 20 22 30 3a 22 20 | aa 20 57 44 24 20 aa 20 |2, "0:" |. WD$ . |
|00001410| 22 2e 54 55 52 54 4c 45 | 2c 53 2c 22 20 aa 20 4d |".TURTLE|,S," . M|
|00001420| 44 24 3a 20 84 31 35 2c | 20 51 51 2c 54 24 2c 4b |D$: .15,| QQ,T$,K|
|00001430| 2c 5a 5a 00 70 54 8a 1b | 8b 20 28 51 51 b2 32 36 |,ZZ.pT..|. (QQ.26|
|00001440| 29 af 28 4d 44 24 b2 22 | 57 22 29 20 a7 20 99 20 |).(MD$."|W") . . |
|00001450| 22 57 52 49 54 45 2d 50 | 52 4f 54 45 43 54 45 44 |"WRITE-P|ROTECTED|
|00001460| 20 44 49 53 4b 22 3a 20 | 45 52 b2 ab 31 3a 20 8e | DISK": |ER..1: .|
|00001470| 00 ad 54 94 1b 8b 20 28 | 51 51 b2 36 37 29 af 28 |..T... (|QQ.67).(|
|00001480| 4d 44 24 b2 22 57 22 29 | af 28 4b b2 33 36 29 20 |MD$."W")|.(K.36) |
|00001490| a7 20 99 20 22 44 49 53 | 4b 20 49 53 20 46 55 4c |. . "DIS|K IS FUL|
|000014a0| 4c 2e 22 3a 20 45 52 b2 | ab 31 3a 20 8e 00 e6 54 |L.": ER.|.1: ...T|
|000014b0| 9e 1b 8b 20 28 51 51 b2 | 36 33 29 af 28 4d 44 24 |... (QQ.|63).(MD$|
|000014c0| b2 22 57 22 29 20 a7 20 | 99 20 22 46 49 4c 45 4e |."W") . |. "FILEN|
|000014d0| 41 4d 45 20 49 53 20 55 | 53 45 44 22 3a 20 45 52 |AME IS U|SED": ER|
|000014e0| b2 ab 31 3a 20 8e 00 23 | 55 a8 1b 8b 20 28 51 51 |..1: ..#|U... (QQ|
|000014f0| b2 36 32 29 af 28 4d 44 | 24 b2 22 52 22 29 20 a7 |.62).(MD|$."R") .|
|00001500| 20 99 20 22 4e 4f 20 53 | 55 43 48 20 46 49 4c 45 | . "NO S|UCH FILE|
|00001510| 20 4f 4e 20 44 49 53 4b | 22 3a 20 45 52 b2 ab 31 | ON DISK|": ER..1|
|00001520| 3a 20 8e 00 5d 55 b2 1b | 8b 20 51 51 b1 31 39 20 |: ..]U..|. QQ.19 |
|00001530| a7 20 99 20 22 49 27 4d | 20 48 41 56 49 4e 47 20 |. . "I'M| HAVING |
|00001540| 54 52 4f 55 42 4c 45 20 | 57 49 54 48 20 54 48 45 |TROUBLE |WITH THE|
|00001550| 20 44 49 53 4b 22 3a 20 | 45 52 b2 ab 31 00 63 55 | DISK": |ER..1.cU|
|00001560| bc 1b 8e 00 80 55 40 1f | 8f 20 47 45 54 20 56 41 |.....U@.|. GET VA|
|00001570| 4c 49 44 20 43 4f 4c 4f | 52 20 4e 55 4d 42 45 52 |LID COLO|R NUMBER|
|00001580| 00 95 55 4a 1f 8d 20 34 | 30 30 30 20 4e 55 4d 45 |..UJ.. 4|000 NUME|
|00001590| 52 49 43 20 85 00 b7 55 | 54 1f 8b 20 45 52 20 b0 |RIC ...U|T.. ER .|
|000015a0| 20 28 4e 55 b1 31 35 29 | b0 28 4e 55 b3 30 29 20 | (NU.15)|.(NU.0) |
|000015b0| a7 20 45 52 b2 ab 31 00 | bd 55 5e 1f 8e 00 d3 55 |. ER..1.|.U^....U|
|000015c0| 28 23 8f 20 46 4f 52 57 | 41 52 44 20 43 4f 4d 4d |(#. FORW|ARD COMM|
|000015d0| 41 4e 44 00 0f 56 32 23 | 8d 20 34 30 30 30 3a 20 |AND..V2#|. 4000: |
|000015e0| 8b 20 45 52 20 b0 20 28 | 4e 55 b3 b2 30 29 20 a7 |. ER . (|NU..0) .|
|000015f0| 20 99 20 22 49 20 43 41 | 4e 27 54 20 47 4f 20 46 | . "I CA|N'T GO F|
|00001600| 4f 52 57 41 52 44 20 22 | 20 57 44 24 3a 20 8e 00 |ORWARD "| WD$: ..|
|00001610| 51 56 3c 23 49 58 b2 58 | 3a 20 49 59 b2 59 3a 20 |QV<#IX.X|: IY.Y: |
|00001620| 81 20 44 b2 20 30 20 a4 | 20 4e 55 3a 20 58 b2 a5 |. D. 0 .| NU: X..|
|00001630| 52 28 44 ac bf 28 48 ac | 43 29 aa 49 58 29 3a 20 |R(D..(H.|C).IX): |
|00001640| 59 b2 a5 52 28 44 ac be | 28 48 ac 43 29 aa 49 59 |Y..R(D..|(H.C).IY|
|00001650| 29 00 63 56 46 23 8b 20 | 58 b1 58 48 20 a7 20 58 |).cVF#. |X.XH . X|
|00001660| b2 58 48 00 75 56 50 23 | 8b 20 58 b3 58 4c 20 a7 |.XH.uVP#|. X.XL .|
|00001670| 20 58 b2 58 4c 00 87 56 | 5a 23 8b 20 59 b1 59 48 | X.XL..V|Z#. Y.YH|
|00001680| 20 a7 20 59 b2 59 48 00 | 99 56 64 23 8b 20 59 b3 | . Y.YH.|.Vd#. Y.|
|00001690| 59 4c 20 a7 20 59 b2 59 | 4c 00 a9 56 6e 23 8b 20 |YL . Y.Y|L..Vn#. |
|000016a0| 50 45 20 a7 20 39 31 32 | 30 00 f0 56 78 23 42 59 |PE . 912|0..Vx#BY|
|000016b0| b2 53 43 20 aa 20 42 4c | ac b5 28 28 59 4d ab 28 |.SC . BL|..((YM.(|
|000016c0| 59 ac 43 52 29 29 ad 42 | 42 29 20 aa 42 42 ac b5 |Y.CR)).B|B) .BB..|
|000016d0| 28 28 58 ab 58 4c 29 ad | 42 42 29 20 aa 20 28 28 |((X.XL).|BB) . ((|
|000016e0| 59 4d ab 28 59 ac 43 52 | 29 29 20 af 20 4d 41 29 |YM.(Y.CR|)) . MA)|
|000016f0| 00 0a 57 82 23 42 49 b2 | 4d 41 20 ab 20 28 28 58 |..W.#BI.|MA . ((X|
|00001700| ab 58 4c 29 20 af 20 4d | 41 29 00 31 57 8c 23 8b |.XL) . M|A).1W.#.|
|00001710| 20 44 52 20 a7 20 97 20 | 42 59 2c 20 c2 28 42 59 | DR . . |BY, .(BY|
|00001720| 29 20 b0 20 42 41 ae 42 | 49 3a 20 89 20 39 31 32 |) . BA.B|I: . 912|
|00001730| 30 00 4e 57 96 23 97 20 | 42 59 2c 20 c2 28 42 59 |0.NW.#. |BY, .(BY|
|00001740| 29 20 af 20 28 46 46 ab | 42 41 ae 42 49 29 00 5f |) . (FF.|BA.BI)._|
|00001750| 57 a0 23 8d 20 32 30 30 | 30 3a 20 82 3a 20 8e 00 |W.#. 200|0: .: ..|
|00001760| 73 57 10 27 8f 20 52 49 | 47 48 54 20 43 4f 4d 4d |sW.'. RI|GHT COMM|
|00001770| 41 4e 44 00 ae 57 1a 27 | 8d 20 34 30 30 30 3a 20 |AND..W.'|. 4000: |
|00001780| 8b 20 45 52 20 b0 20 28 | 4e 55 b3 30 29 20 a7 20 |. ER . (|NU.0) . |
|00001790| 99 20 22 49 20 43 41 4e | 27 54 20 54 55 52 4e 20 |. "I CAN|'T TURN |
|000017a0| 52 49 47 48 54 20 22 20 | 57 44 24 3a 20 8e 00 c3 |RIGHT " |WD$: ...|
|000017b0| 57 24 27 44 48 b2 4e 55 | 3a 20 8d 20 33 30 30 30 |W$'DH.NU|: . 3000|
|000017c0| 3a 20 8e 00 d6 57 f8 2a | 8f 20 4c 45 46 54 20 43 |: ...W.*|. LEFT C|
|000017d0| 4f 4d 4d 41 4e 44 00 0e | 58 02 2b 8d 20 34 30 30 |OMMAND..|X.+. 400|
|000017e0| 30 3a 20 8b 20 45 52 20 | b0 20 28 4e 55 b3 30 29 |0: . ER |. (NU.0)|
|000017f0| 20 a7 20 99 20 22 49 20 | 43 41 4e 27 54 20 47 4f | . . "I |CAN'T GO|
|00001800| 20 4c 45 46 54 20 22 20 | 57 44 24 3a 20 8e 00 24 | LEFT " |WD$: ..$|
|00001810| 58 0c 2b 44 48 b2 ab 4e | 55 3a 20 8d 20 33 30 30 |X.+DH..N|U: . 300|
|00001820| 30 3a 20 8e 00 37 58 e0 | 2e 8f 20 48 4f 4d 45 20 |0: ..7X.|.. HOME |
|00001830| 43 4f 4d 4d 41 4e 44 00 | 5a 58 ea 2e 58 b2 30 3a |COMMAND.|ZX..X.0:|
|00001840| 20 59 b2 30 3a 20 48 b2 | 30 3a 20 44 48 b2 30 3a | Y.0: H.|0: DH.0:|
|00001850| 20 8d 20 33 30 30 30 3a | 20 8e 00 73 58 c8 32 8f | . 3000:| ..sX.2.|
|00001860| 20 53 45 54 48 45 41 44 | 49 4e 47 20 43 4f 4d 4d | SETHEAD|ING COMM|
|00001870| 41 4e 44 00 99 58 d2 32 | 8d 20 34 30 30 30 3a 20 |AND..X.2|. 4000: |
|00001880| 8b 20 28 a8 20 45 52 29 | af 28 48 b3 b2 33 36 30 |. (. ER)|.(H..360|
|00001890| 29 20 a7 20 31 33 30 33 | 30 00 c9 58 dc 32 45 52 |) . 1303|0..X.2ER|
|000018a0| b2 ab 31 3a 20 99 20 22 | 49 20 43 41 4e 27 54 20 |..1: . "|I CAN'T |
|000018b0| 53 45 54 20 41 20 48 45 | 41 44 49 4e 47 20 4f 46 |SET A HE|ADING OF|
|000018c0| 20 22 20 57 44 24 3a 20 | 8e 00 e3 58 e6 32 48 b2 | " WD$: |...X.2H.|
|000018d0| 4e 55 3a 20 44 48 b2 30 | 3a 20 8d 20 33 30 30 30 |NU: DH.0|: . 3000|
|000018e0| 3a 20 8e 00 fd 58 b0 36 | 8f 20 53 45 54 50 4f 53 |: ...X.6|. SETPOS|
|000018f0| 49 54 49 4f 4e 20 43 4f | 4d 4d 41 4e 44 00 2c 59 |ITION CO|MMAND.,Y|
|00001900| ba 36 8d 20 34 30 30 30 | 3a 20 8b 20 28 a8 20 45 |.6. 4000|: . (. E|
|00001910| 52 29 af 28 4e 55 b1 b2 | 58 4c 29 af 28 4e 55 b3 |R).(NU..|XL).(NU.|
|00001920| b2 58 48 29 20 a7 20 31 | 34 30 33 30 00 5c 59 c4 |.XH) . 1|4030.\Y.|
|00001930| 36 45 52 b2 ab 31 3a 20 | 99 20 22 49 20 43 41 4e |6ER..1: |. "I CAN|
|00001940| 27 54 20 53 45 54 20 41 | 4e 20 58 2d 56 41 4c 55 |'T SET A|N X-VALU|
|00001950| 45 20 4f 46 20 22 57 44 | 24 3a 20 8e 00 6e 59 ce |E OF "WD|$: ..nY.|
|00001960| 36 51 51 b2 4e 55 3a 20 | 8d 20 34 30 30 30 00 a5 |6QQ.NU: |. 4000..|
|00001970| 59 d8 36 8b 20 28 a8 20 | 45 52 29 af 28 4e 55 b1 |Y.6. (. |ER).(NU.|
|00001980| b2 59 4c 29 af 28 4e 55 | b3 b2 59 48 29 20 a7 20 |.YL).(NU|..YH) . |
|00001990| 58 b2 51 51 3a 20 59 b2 | 4e 55 3a 20 8d 20 32 30 |X.QQ: Y.|NU: . 20|
|000019a0| 30 30 3a 20 8e 00 d4 59 | e2 36 45 52 b2 ab 31 3a |00: ...Y|.6ER..1:|
|000019b0| 20 99 20 22 49 20 43 41 | 4e 27 54 20 53 45 54 20 | . "I CA|N'T SET |
|000019c0| 41 20 59 2d 56 41 4c 55 | 45 20 4f 46 20 22 57 44 |A Y-VALU|E OF "WD|
|000019d0| 24 3a 20 8e 00 eb 59 98 | 3a 8f 20 50 45 4e 43 4f |$: ...Y.|:. PENCO|
|000019e0| 4c 4f 52 20 43 4f 4d 4d | 41 4e 44 00 1c 5a a2 3a |LOR COMM|AND..Z.:|
|000019f0| 8d 20 38 30 30 30 3a 20 | 8b 20 45 52 20 a7 20 99 |. 8000: |. ER . .|
|00001a00| 20 57 44 24 20 22 20 49 | 53 20 4e 4f 54 20 41 20 | WD$ " I|S NOT A |
|00001a10| 50 45 4e 43 4f 4c 4f 52 | 22 3a 20 8e 00 41 5a ac |PENCOLOR|": ..AZ.|
|00001a20| 3a 97 20 32 2c 20 28 c2 | 28 32 29 af 31 35 29 aa |:. 2, (.|(2).15).|
|00001a30| 31 36 ac 4e 55 3a 20 9e | 20 34 39 32 33 35 3a 20 |16.NU: .| 49235: |
|00001a40| 8e 00 5f 5a 80 3e 8f 20 | 42 41 43 4b 47 52 4f 55 |.._Z.>. |BACKGROU|
|00001a50| 4e 44 43 4f 4c 4f 52 20 | 43 4f 4d 4d 41 4e 44 00 |NDCOLOR |COMMAND.|
|00001a60| 97 5a 8a 3e 8d 20 38 30 | 30 30 3a 20 8b 20 45 52 |.Z.>. 80|00: . ER|
|00001a70| 20 a7 20 99 20 57 44 24 | 20 22 20 49 53 20 4e 4f | . . WD$| " IS NO|
|00001a80| 54 20 41 20 42 41 43 4b | 47 52 4f 55 4e 44 43 4f |T A BACK|GROUNDCO|
|00001a90| 4c 4f 52 22 3a 20 8e 00 | ba 5a 94 3e 97 20 32 2c |LOR": ..|.Z.>. 2,|
|00001aa0| 20 28 c2 28 32 29 af 32 | 34 30 29 aa 4e 55 3a 20 | (.(2).2|40).NU: |
|00001ab0| 9e 20 34 39 32 33 35 3a | 20 8e 00 d4 5a 68 42 8f |. 49235:| ...ZhB.|
|00001ac0| 20 54 55 52 54 4c 45 43 | 4f 4c 4f 52 20 43 4f 4d | TURTLEC|OLOR COM|
|00001ad0| 4d 41 4e 44 00 08 5b 7c | 42 8d 20 38 30 30 30 3a |MAND..[||B. 8000:|
|00001ae0| 20 8b 20 45 52 20 a7 20 | 99 20 57 44 24 20 22 20 | . ER . |. WD$ " |
|00001af0| 49 53 20 4e 4f 54 20 41 | 20 54 55 52 4c 54 45 43 |IS NOT A| TURLTEC|
|00001b00| 4f 4c 4f 52 22 3a 20 8e | 00 1b 5b 86 42 97 20 35 |OLOR": .|..[.B. 5|
|00001b10| 33 32 38 37 2c 20 4e 55 | 3a 20 8e 00 36 5b 50 46 |3287, NU|: ..6[PF|
|00001b20| 8f 20 44 45 46 49 4e 45 | 20 4e 45 57 20 50 52 4f |. DEFINE| NEW PRO|
|00001b30| 43 45 44 55 52 45 00 53 | 5b 5a 46 8d 20 35 30 30 |CEDURE.S|[ZF. 500|
|00001b40| 30 3a 8b 20 57 44 24 b3 | b1 22 22 20 a7 20 31 38 |0:. WD$.|."" . 18|
|00001b50| 30 33 30 00 7d 5b 64 46 | 99 20 22 49 20 4e 45 45 |030.}[dF|. "I NEE|
|00001b60| 44 20 41 20 50 52 4f 43 | 45 44 55 52 45 20 4e 41 |D A PROC|EDURE NA|
|00001b70| 4d 45 22 3a 20 45 52 b2 | ab 31 3a 20 8e 00 bd 5b |ME": ER.|.1: ...[|
|00001b80| 6e 46 8b 20 50 43 b2 46 | 46 20 a7 20 99 22 49 20 |nF. PC.F|F . ."I |
|00001b90| 43 41 4e 27 54 20 52 45 | 4d 45 4d 42 45 52 20 41 |CAN'T RE|MEMBER A|
|00001ba0| 4e 59 20 4d 4f 52 45 20 | 50 52 4f 43 45 44 55 52 |NY MORE |PROCEDUR|
|00001bb0| 45 53 22 3a 20 45 52 b2 | ab 31 3a 20 8e 00 f5 5b |ES": ER.|.1: ...[|
|00001bc0| 78 46 8d 20 36 30 30 30 | 3a 20 8b 20 50 4e b3 b1 |xF. 6000|: . PN..|
|00001bd0| 30 20 a7 20 99 20 57 44 | 24 20 22 20 41 4c 52 45 |0 . . WD|$ " ALRE|
|00001be0| 41 44 59 20 45 58 49 53 | 54 53 22 3a 20 45 52 b2 |ADY EXIS|TS": ER.|
|00001bf0| ab 31 3a 20 8e 00 21 5c | 82 46 50 43 b2 50 43 aa |.1: ..!\|.FPC.PC.|
|00001c00| 31 3a 20 50 4e 24 28 50 | 43 29 b2 57 44 24 3a 20 |1: PN$(P|C).WD$: |
|00001c10| 99 20 57 44 24 3b 3a 20 | 85 20 50 52 24 28 50 43 |. WD$;: |. PR$(PC|
|00001c20| 29 00 40 5c 8c 46 99 20 | 57 44 24 20 22 20 49 53 |).@\.F. |WD$ " IS|
|00001c30| 20 4e 4f 57 20 44 45 46 | 49 4e 45 44 22 3a 20 8e | NOW DEF|INED": .|
|00001c40| 00 59 5c 38 4a 8f 20 50 | 52 49 4e 54 4e 41 4d 45 |.Y\8J. P|RINTNAME|
|00001c50| 53 20 43 4f 4d 4d 41 4e | 44 00 7a 5c 42 4a 99 20 |S COMMAN|D.z\BJ. |
|00001c60| 22 4e 55 4d 42 45 52 20 | 4f 46 20 50 52 4f 43 45 |"NUMBER |OF PROCE|
|00001c70| 44 55 52 45 53 3a 22 20 | 50 43 00 89 5c 4c 4a 8b |DURES:" |PC..\LJ.|
|00001c80| 20 50 43 b2 30 20 a7 20 | 8e 00 a9 5c 56 4a 81 20 | PC.0 . |...\VJ. |
|00001c90| 4b b2 20 31 20 a4 20 50 | 43 3a 20 99 20 50 4e 24 |K. 1 . P|C: . PN$|
|00001ca0| 28 4b 29 3a 20 82 3a 20 | 8e 00 c6 5c 20 4e 8f 20 |(K): .: |...\ N. |
|00001cb0| 50 52 49 4e 54 50 52 4f | 43 45 44 55 52 45 20 43 |PRINTPRO|CEDURE C|
|00001cc0| 4f 4d 4d 41 4e 44 00 e4 | 5c 2a 4e 8d 20 35 30 30 |OMMAND..|\*N. 500|
|00001cd0| 30 3a 20 8b 20 57 44 24 | b3 b1 22 22 20 a7 20 32 |0: . WD$|.."" . 2|
|00001ce0| 30 30 33 30 00 0e 5d 34 | 4e 45 52 b2 ab 31 3a 20 |0030..]4|NER..1: |
|00001cf0| 99 20 22 49 20 4e 45 45 | 44 20 41 20 50 52 4f 43 |. "I NEE|D A PROC|
|00001d00| 45 44 55 52 45 20 4e 41 | 4d 45 22 3a 20 8e 00 31 |EDURE NA|ME": ..1|
|00001d10| 5d 3e 4e 8d 20 36 30 30 | 30 3a 20 8b 20 50 4e b3 |]>N. 600|0: . PN.|
|00001d20| b1 30 20 a7 20 99 20 50 | 52 24 28 50 4e 29 3a 20 |.0 . . P|R$(PN): |
|00001d30| 8e 00 5e 5d 48 4e 45 52 | b2 ab 31 3a 20 99 20 22 |..^]HNER|..1: . "|
|00001d40| 54 48 45 52 45 20 49 53 | 20 4e 4f 20 50 52 4f 43 |THERE IS| NO PROC|
|00001d50| 45 44 55 52 45 20 22 20 | 57 44 24 3a 20 8e 00 72 |EDURE " |WD$: ..r|
|00001d60| 5d 08 52 8f 20 45 52 41 | 53 45 20 43 4f 4d 4d 41 |].R. ERA|SE COMMA|
|00001d70| 4e 44 00 90 5d 12 52 8d | 20 35 30 30 30 3a 20 8b |ND..].R.| 5000: .|
|00001d80| 20 57 44 24 b3 b1 22 22 | 20 a7 20 32 31 30 33 30 | WD$..""| . 21030|
|00001d90| 00 ba 5d 1c 52 45 52 b2 | ab 31 3a 20 99 20 22 49 |..].RER.|.1: . "I|
|00001da0| 20 4e 45 45 44 20 41 20 | 50 52 4f 43 45 44 55 52 | NEED A |PROCEDUR|
|00001db0| 45 20 4e 41 4d 45 22 3a | 20 8e 00 d5 5d 26 52 8d |E NAME":| ...]&R.|
|00001dc0| 36 30 30 30 3a 20 8b 20 | 50 4e b3 b1 30 20 a7 20 |6000: . |PN..0 . |
|00001dd0| 32 31 30 35 30 00 02 5e | 30 52 45 52 b2 ab 31 3a |21050..^|0RER..1:|
|00001de0| 20 99 20 22 54 48 45 52 | 45 20 49 53 20 4e 4f 20 | . "THER|E IS NO |
|00001df0| 50 52 4f 43 45 44 55 52 | 45 20 22 20 57 44 24 3a |PROCEDUR|E " WD$:|
|00001e00| 20 8e 00 46 5e 3a 52 50 | 52 24 28 50 4e 29 b2 50 | ..F^:RP|R$(PN).P|
|00001e10| 52 24 28 50 43 29 3a 20 | 50 4e 24 28 50 4e 29 b2 |R$(PC): |PN$(PN).|
|00001e20| 50 4e 24 28 50 43 29 3a | 20 50 43 b2 50 43 ab 31 |PN$(PC):| PC.PC.1|
|00001e30| 3a 99 20 57 44 24 20 22 | 20 49 53 20 45 52 41 53 |:. WD$ "| IS ERAS|
|00001e40| 45 44 22 3a 20 8e 00 5b | 5e f0 55 8f 20 52 45 4e |ED": ..[|^.U. REN|
|00001e50| 41 4d 45 20 43 4f 4d 4d | 41 4e 44 00 79 5e fa 55 |AME COMM|AND.y^.U|
|00001e60| 8d 20 35 30 30 30 3a 20 | 8b 20 57 44 24 b3 b1 22 |. 5000: |. WD$.."|
|00001e70| 22 20 a7 20 32 32 30 33 | 30 00 a7 5e 04 56 45 52 |" . 2203|0..^.VER|
|00001e80| b2 ab 31 3a 20 99 20 22 | 49 20 4e 45 45 44 20 54 |..1: . "|I NEED T|
|00001e90| 4f 20 4b 4e 4f 57 20 54 | 48 45 20 4f 4c 44 20 4e |O KNOW T|HE OLD N|
|00001ea0| 41 4d 45 22 3a 20 8e 00 | b2 5e 0e 56 8d 20 36 30 |AME": ..|.^.V. 60|
|00001eb0| 30 30 00 ed 5e 18 56 8b | 20 50 4e b2 30 20 a7 20 |00..^.V.| PN.0 . |
|00001ec0| 99 20 22 50 52 4f 43 45 | 44 55 52 45 20 22 20 57 |. "PROCE|DURE " W|
|00001ed0| 44 24 20 22 20 44 4f 45 | 53 4e 27 54 20 45 58 49 |D$ " DOE|SN'T EXI|
|00001ee0| 53 54 22 3a 20 45 52 b2 | ab 31 3a 20 8e 00 f7 5e |ST": ER.|.1: ...^|
|00001ef0| 22 56 51 51 b2 50 4e 00 | 14 5f 2c 56 8d 20 35 30 |"VQQ.PN.|._,V. 50|
|00001f00| 30 30 3a 20 8b 20 57 44 | 24 b3 b1 22 22 20 a7 32 |00: . WD|$.."" .2|
|00001f10| 32 30 38 30 00 42 5f 36 | 56 99 20 22 49 20 4e 45 |2080.B_6|V. "I NE|
|00001f20| 45 44 20 54 4f 20 4b 4e | 4f 57 20 54 48 45 20 4e |ED TO KN|OW THE N|
|00001f30| 45 57 20 4e 41 4d 45 22 | 3a 20 45 52 b2 ab 31 3a |EW NAME"|: ER..1:|
|00001f40| 20 8e 00 4d 5f 40 56 8d | 20 36 30 30 30 00 89 5f | ..M_@V.| 6000.._|
|00001f50| 4a 56 8b 20 50 4e b3 b1 | 30 20 a7 20 99 20 22 59 |JV. PN..|0 . . "Y|
|00001f60| 4f 55 20 48 41 56 45 20 | 41 4c 52 45 41 44 59 20 |OU HAVE |ALREADY |
|00001f70| 55 53 45 44 20 54 48 41 | 54 20 4e 41 4d 45 22 3a |USED THA|T NAME":|
|00001f80| 20 45 52 b2 ab 31 3a 20 | 8e 00 ad 5f 54 56 50 4e | ER..1: |..._TVPN|
|00001f90| 24 28 51 51 29 b2 57 44 | 24 3a 20 99 20 22 52 45 |$(QQ).WD|$: . "RE|
|00001fa0| 4e 41 4d 49 4e 47 20 4f | 4b 22 3a 20 8e 00 c0 5f |NAMING O|K": ..._|
|00001fb0| d8 59 8f 20 4c 4f 41 44 | 20 43 4f 4d 4d 41 4e 44 |.Y. LOAD| COMMAND|
|00001fc0| 00 e2 5f e2 59 4d 44 24 | b2 22 52 22 3a 20 8d 20 |.._.YMD$|."R": . |
|00001fd0| 37 30 30 30 3a 20 8b 20 | 45 52 20 a7 20 32 33 30 |7000: . |ER . 230|
|00001fe0| 36 30 00 ed 5f ec 59 84 | 32 2c 20 4e 50 00 28 60 |60.._.Y.|2, NP.(`|
|00001ff0| f6 59 8b 20 28 4e 50 aa | 50 43 29 b1 46 46 20 a7 |.Y. (NP.|PC).FF .|
|00002000| 20 99 20 22 54 4f 4f 20 | 4d 41 4e 59 20 50 52 4f | . "TOO |MANY PRO|
|00002010| 43 45 44 55 52 45 53 22 | 3a 20 45 52 b2 ab 31 3a |CEDURES"|: ER..1:|
|00002020| 20 89 20 32 33 30 36 30 | 00 5f 60 00 5a 81 20 4b | . 23060|._`.Z. K|
|00002030| b2 20 31 20 a4 20 4e 50 | 3a 20 84 32 2c 20 50 4e |. 1 . NP|: .2, PN|
|00002040| 24 28 50 43 aa 4b 29 2c | 20 50 52 24 28 50 43 aa |$(PC.K),| PR$(PC.|
|00002050| 4b 29 3a 20 82 3a 20 50 | 43 b2 50 43 aa 4e 50 00 |K): .: P|C.PC.NP.|
|00002060| 7c 60 0a 5a 99 20 4e 50 | 20 22 50 52 4f 43 45 44 ||`.Z. NP| "PROCED|
|00002070| 55 52 45 53 20 4c 4f 41 | 44 45 44 22 00 8d 60 14 |URES LOA|DED"..`.|
|00002080| 5a a0 20 32 3a 20 a0 20 | 31 35 3a 20 8e 00 a0 60 |Z. 2: . |15: ...`|
|00002090| c0 5d 8f 20 53 41 56 45 | 20 43 4f 4d 4d 41 4e 44 |.]. SAVE| COMMAND|
|000020a0| 00 c2 60 ca 5d 4d 44 24 | b2 22 57 22 3a 20 8d 20 |..`.]MD$|."W": . |
|000020b0| 37 30 30 30 3a 20 8b 20 | 45 52 20 a7 20 32 34 30 |7000: . |ER . 240|
|000020c0| 34 30 00 f5 60 d4 5d 98 | 32 2c 20 50 43 3a 20 81 |40..`.].|2, PC: .|
|000020d0| 20 4b b2 20 31 20 a4 20 | 50 43 3a 20 98 32 2c 20 | K. 1 . |PC: .2, |
|000020e0| 50 4e 24 28 4b 29 3a 20 | 98 32 2c 20 50 52 24 28 |PN$(K): |.2, PR$(|
|000020f0| 4b 29 3a 20 82 00 11 61 | de 5d 99 20 50 43 20 22 |K): ...a|.]. PC "|
|00002100| 50 52 4f 43 45 44 55 52 | 45 53 20 53 41 56 45 44 |PROCEDUR|ES SAVED|
|00002110| 22 00 22 61 e8 5d a0 20 | 32 3a 20 a0 20 31 35 3a |"."a.]. |2: . 15:|
|00002120| 20 8e 00 3c 61 a8 61 8f | 20 53 43 52 41 54 43 48 | ..<a.a.| SCRATCH|
|00002130| 46 49 4c 45 20 43 4f 4d | 4d 41 4e 44 00 60 61 b2 |FILE COM|MAND.`a.|
|00002140| 61 45 52 b2 30 3a 20 8d | 20 35 30 30 30 3a 20 8b |aER.0: .| 5000: .|
|00002150| 20 57 44 24 b3 b1 22 22 | 20 a7 20 32 35 30 33 30 | WD$..""| . 25030|
|00002160| 00 8d 61 bc 61 99 20 22 | 59 4f 55 20 4d 55 53 54 |..a.a. "|YOU MUST|
|00002170| 20 53 55 50 50 4c 59 20 | 41 20 46 49 4c 45 4e 41 | SUPPLY |A FILENA|
|00002180| 4d 45 22 3a 20 45 52 b2 | ab 31 3a 20 8e 00 9b 61 |ME": ER.|.1: ...a|
|00002190| c6 61 9f 20 31 35 2c 38 | 2c 31 35 00 ce 61 d0 61 |.a. 15,8|,15..a.a|
|000021a0| 98 31 35 2c 20 22 53 30 | 3a 22 20 aa 20 57 44 24 |.15, "S0|:" . WD$|
|000021b0| 20 aa 20 22 2e 54 55 52 | 54 4c 45 22 3a 20 84 31 | . ".TUR|TLE": .1|
|000021c0| 35 2c 20 51 51 2c 54 24 | 2c 5a 5a 2c 5a 5a 00 12 |5, QQ,T$|,ZZ,ZZ..|
|000021d0| 62 da 61 8b 20 28 51 51 | b1 31 39 29 af 28 51 51 |b.a. (QQ|.19).(QQ|
|000021e0| b3 b1 36 32 29 20 a7 20 | 99 20 22 49 27 4d 20 48 |..62) . |. "I'M H|
|000021f0| 41 56 49 4e 47 20 54 52 | 4f 55 42 4c 45 20 57 49 |AVING TR|OUBLE WI|
|00002200| 54 48 20 54 48 45 20 44 | 49 53 4b 22 3a 45 52 b2 |TH THE D|ISK":ER.|
|00002210| ab 31 00 1e 62 e4 61 a0 | 20 31 35 3a 20 8e 00 00 |.1..b.a.| 15: ...|
|00002220| 00 | |. | |
+--------+-------------------------+-------------------------+--------+--------+
